home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 4 (Reseller) / Apple Ref. & Pres. Lib.v4.0.iso / 4-Demos / Third Party Demos / Utilities / In⁄Out™ / In_Out™ / card_10425.txt < prev    next >
Text File  |  1990-04-09  |  3KB  |  150 lines
  1. -- card: 10425 from stack: in
  2. -- bmap block id: 10692
  3. -- flags: 0000
  4. -- background id: 2649
  5. -- name: nameafteruser
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=142 top=107 right=127 bottom=221
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: New Button
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to card username1
  23. end mouseUp
  24.  
  25.  
  26.  
  27. -- part 2 (button)
  28. -- low flags: 00
  29. -- high flags: 0000
  30. -- rect: left=141 top=170 right=192 bottom=252
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: New Button
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   show card field "add"
  42.   repeat until the mouse is down
  43.     show card field "add"
  44.   end repeat
  45.   hide card field "add"
  46. end mouseUp
  47.  
  48.  
  49.  
  50. -- part 3 (button)
  51. -- low flags: 00
  52. -- high flags: 2000
  53. -- rect: left=227 top=205 right=225 bottom=289
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: New Button
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   put "This will log in the currently selected name"
  65.   wait 160 ticks
  66.   doMenu "Message"
  67.   go to card "SLBnames"
  68. end mouseUp
  69.  
  70.  
  71.  
  72. -- part 4 (button)
  73. -- low flags: 00
  74. -- high flags: 2000
  75. -- rect: left=228 top=205 right=225 bottom=288
  76. -- title width / last selected line: 0
  77. -- icon id / first selected line: 0 / 0
  78. -- text alignment: 1
  79. -- font id: 0
  80. -- text size: 12
  81. -- style flags: 0
  82. -- line height: 16
  83. -- part name: New Button
  84. ----- HyperTalk script -----
  85. on mouseUp
  86.   show card field "log"
  87.   repeat until the mouse is down
  88.     show card field "log"
  89.   end repeat
  90.   hide card field "log"
  91.   go to card "SLBnames"
  92. end mouseUp
  93.  
  94.  
  95.  
  96. -- part 5 (button)
  97. -- low flags: 00
  98. -- high flags: 2000
  99. -- rect: left=311 top=205 right=225 bottom=371
  100. -- title width / last selected line: 0
  101. -- icon id / first selected line: 0 / 0
  102. -- text alignment: 1
  103. -- font id: 0
  104. -- text size: 12
  105. -- style flags: 0
  106. -- line height: 16
  107. -- part name: New Button
  108. ----- HyperTalk script -----
  109. on mouseUp
  110.   go to card "SLBnames"
  111. end mouseUp
  112.  
  113.  
  114.  
  115. -- part 6 (field)
  116. -- low flags: 81
  117. -- high flags: 0004
  118. -- rect: left=70 top=199 right=311 bottom=441
  119. -- title width / last selected line: 0
  120. -- icon id / first selected line: 0 / 0
  121. -- text alignment: 0
  122. -- font id: 20
  123. -- text size: 14
  124. -- style flags: 0
  125. -- line height: 18
  126. -- part name: add
  127.  
  128.  
  129. -- part 7 (field)
  130. -- low flags: 80
  131. -- high flags: 0004
  132. -- rect: left=93 top=251 right=274 bottom=420
  133. -- title width / last selected line: 0
  134. -- icon id / first selected line: 0 / 0
  135. -- text alignment: 0
  136. -- font id: 20
  137. -- text size: 18
  138. -- style flags: 0
  139. -- line height: 24
  140. -- part name: log
  141.  
  142.  
  143. -- part contents for card part 6
  144. ----- text -----
  145. This will let you add the user to your menu. You will need the password once.  You can then share your workstation with others on this menu. If the person is going to be using your machine for this one time, uncheck the Add to menu box.
  146. I have added three names as an example...
  147.  
  148. -- part contents for card part 7
  149. ----- text -----
  150. This will log in the currently selected user.